home *** CD-ROM | disk | FTP | other *** search
/ Scene Storm / Scene Storm - Volume 1.iso / coding / c / amiexpress / source / doors / hacker / rxx.setup < prev   
Encoding:
Text File  |  1992-12-26  |  2.0 KB  |  55 lines
  1. JH_BBSName       = 11
  2. JH_Sysop         = 12
  3. DT_NAME          = 100
  4. DT_PASSWORD      = 101
  5. DT_LOCATION      = 102
  6. DT_PHONENUMBER   = 103
  7. DT_SLOTNUMBER    = 104
  8. DT_SECSTATUS     = 105
  9. DT_MESSAGESPOSTED= 109
  10. DT_UPLOADS       = 110
  11. DT_DOWNLOADS     = 111
  12. DT_TIMESCALLED   = 112
  13. DT_TIMELASTON    = 113
  14. DT_TIMEUSED      = 114
  15. DT_TIMELIMIT     = 115
  16. DT_TIMETOTAL     = 116
  17. DT_BYTESUPLOAD   = 117
  18. DT_BYTEDOWNLOAD  = 118
  19. DT_DAILYBYTELIMIT= 119
  20. DT_DAILYBYTEDLD  = 120
  21. DT_EXPERT        = 121
  22. DT_LINELENGTH    = 122
  23. ACTIVE_NODES     = 123
  24. DT_DUMP          = 124
  25. BB_CONFNAME      = 126
  26. BB_CONFLOCAL     = 127
  27. BB_LOCAL         = 128
  28. BB_STATUS        = 129
  29. BB_COMMAND       = 130
  30. BB_MAINLINE      = 131
  31. /*  Hacker v3.3 Setup File - Use caution if you decide to edit this file. */
  32. datestamp=date('U')
  33. newdate=date;termtype=0
  34. if exists(misc'tt'termtype'.start') & termtype > 0 then do;sendfile misc'tt'termtype'.start';end;else sendfile misc'sys.start'
  35.  
  36. getuser DT_SECSTATUS;access=result;CLS='\f1';getuser DT_NAME;name=result
  37. RETURN = '\cbHit \c1[\cfRETURN\c1] \cbto Continue\c1: '
  38. WD=0;EXPERT = 0;TOTALUSERS = 0;WINFLAG = 0;MAINCOUNT = 0;HEHIT = 0;BANKMONEY = 1000000
  39. MEGS = 10;SCA = 1;BW = 1;TROJ = 1;MK = 1;drty = 1;ttyp = 1;xrp = 0
  40. LASTFIGHT = 'None';TOTALPLAYS = 0;totmgcr = 0;TOTALWINS = 0;TOTALLOSS = 0
  41. MEGSLOST = 0;BWUSED = 0;TROJUSED = 0;SCAUSED = 0;MKUSED = 0;MONEY = 1000
  42. LEVEL = 1;LEVNAME = 'Beginner';EXBTYPE = 0;MAINCOUNTER = 0;MAXTURNS = 30
  43. SAVINGS = 0;thecard=0
  44.  
  45. if ~exists(save'BANK') then do;txt='makedir 'save'Bank';address command ''txt;end
  46. if ~exists(BNK'MONBANK') then do;call open gag, (BNK'MONBANK'), 'W';call writeln gag, '1000000000';call close gag;end
  47. call open gag, (bnk'monbank'), 'R';bankmoney=readln(gag);call close gag
  48. if exists(BNK''NAME) then do;call open gag, (BNK''NAME), 'R';SAVINGS = readln(gag);call close gag;end
  49. if ~exists(BNK''NAME) then do;call open gag, (BNK''NAME), 'W';call writeln gag, 0;call close gag;end
  50. if ~exists(save'Players') then do;address command 'makedir 'save'Players';end
  51. if ~exists(mess) then do;address command 'makedir 'save'Messages';end
  52.  
  53. boom=1
  54.  
  55.